home *** CD-ROM | disk | FTP | other *** search
/ X'Tasies 2 / X'Tasies 2 - Disc 2.iso / mac / Main.Dir / 00073_Volume 3.ls < prev    next >
Encoding:
Text File  |  1996-08-30  |  639 b   |  29 lines
  1. on mouseDown
  2.   repeat with i = 7 down to 0
  3.     set the visible of sprite (24 + i) to 1
  4.   end repeat
  5.   repeat with i = 3 down to 0
  6.     set the visible of sprite (24 + i) to 0
  7.   end repeat
  8.   updateStage()
  9.   repeat while the mouseDown = 1
  10.     if rollOver(35) = 1 then
  11.       set the visible of sprite 27 to 0
  12.       updateStage()
  13.     end if
  14.   end repeat
  15. end
  16.  
  17. on mouseUp
  18.   if rollOver(35) = 1 then
  19.     set the soundLevel to 3
  20.   else
  21.     repeat with i = 7 down to 0
  22.       set the visible of sprite (24 + i) to 1
  23.     end repeat
  24.     repeat with i = the soundLevel down to 0
  25.       set the visible of sprite (24 + i) to 0
  26.     end repeat
  27.   end if
  28. end
  29.